home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / one_scrs / asm / r.asm < prev    next >
Encoding:
Assembly Source File  |  1996-07-16  |  2.3 KB  |  68 lines
  1. ; =============================================================================
  2. ; =                                                                           =
  3. ; = Razos genya a' la' Halcyon...                                             =
  4. ; =                                                                           =
  5. ; =============================================================================
  6.  
  7. .386p
  8. .model flat,c
  9. .code
  10.  
  11.                 public  rangatas
  12.                 public  rzoom
  13.  
  14. rangatas:       pushad
  15.                 cmp     offsptr,23*2
  16.                 jne     nonullaz
  17.                 mov     offsptr,0
  18. nonullaz:       add     offsptr,2
  19.                 lea     esi,offstbl
  20.                 add     esi,offsptr
  21.                 mov     ax,[esi]
  22.                 mov     cx,rzoom
  23.                 shl     ax,cl
  24.                 mov     offs,ax
  25.                 mov     dx,3d4h
  26.                 mov     ax,offs
  27.                 mov     al,0ch
  28.                 out     dx,ax
  29.                 mov     ax,offs
  30.                 shl     ax,8
  31.                 mov     al,0dh
  32.                 out     dx,ax
  33.                 popad
  34.                 ret
  35.  
  36.  
  37.                 offstbl dw      320    * 0
  38.                         dw      -320   * 0
  39.                         dw      320    * 1
  40.                         dw      -320   * 1
  41.                         dw      320    * 0
  42.                         dw      -320   * 0
  43.                         dw      320    * 1
  44.                         dw      -320   * 1
  45.                         dw      320    * 2
  46.                         dw      -320   * 2
  47.                         dw      320    * 0
  48.                         dw      -320   * 0
  49.                         dw      320    * 1
  50.                         dw      -320   * 1
  51.                         dw      320    * 2
  52.                         dw      -320   * 2
  53.                         dw      320    * 3
  54.                         dw      -320   * 3
  55.                         dw      320    * 0
  56.                         dw      -320   * 0
  57.                         dw      320    * 1
  58.                         dw      -320   * 1
  59.                         dw      320    * 2
  60.                         dw      -320   * 2
  61.                 offs    dw      0
  62.                 offsptr dd      0
  63.                 rzoom   dw      0
  64.  
  65.                 include asm\timer.asm
  66.  
  67. end
  68.